home *** CD-ROM | disk | FTP | other *** search
/ .net - The Best of 1999/2000 / netCD Special01.iso / pc / Software / Poco 1.2 / pocosetup.exe / file0001.bin / 0 / RCDATA / TFRMINDEX / TFRMINDEX.txt
Encoding:
Text File  |  2000-03-01  |  11.2 KB  |  445 lines

  1. object FrmIndex: TFrmIndex
  2.   Left = 328
  3.   Top = 468
  4.   BorderIcons = []
  5.   BorderStyle = bsNone
  6.   Caption = 'Message Index'
  7.   ClientHeight = 260
  8.   ClientWidth = 530
  9.   Color = clBtnFace
  10.   UseDockManager = True
  11.   DragKind = dkDock
  12.   DragMode = dmAutomatic
  13.   Font.Charset = DEFAULT_CHARSET
  14.   Font.Color = clWindowText
  15.   Font.Height = -13
  16.   Font.Name = 'MS Sans Serif'
  17.   Font.Style = []
  18.   OldCreateOrder = False
  19.   Scaled = False
  20.   OnActivate = FormActivate
  21.   OnClose = FormClose
  22.   OnCreate = FormCreate
  23.   OnDestroy = FormDestroy
  24.   PixelsPerInch = 120
  25.   TextHeight = 16
  26.   object MsgIndexPanel: TPanel
  27.     Left = 0
  28.     Top = 0
  29.     Width = 530
  30.     Height = 260
  31.     Align = alClient
  32.     BevelInner = bvRaised
  33.     BevelOuter = bvLowered
  34.     TabOrder = 0
  35.     object Bevel2: TBevel
  36.       Left = 2
  37.       Top = 19
  38.       Width = 526
  39.       Height = 3
  40.       Align = alTop
  41.       Shape = bsTopLine
  42.     end
  43.     object MsgIndexTitlePanel: TPanel
  44.       Left = 2
  45.       Top = 2
  46.       Width = 526
  47.       Height = 17
  48.       Cursor = crHandPoint
  49.       Align = alTop
  50.       BevelOuter = bvNone
  51.       Color = 8388681
  52.       TabOrder = 0
  53.       OnClick = MsgIndexTitlePanelClick
  54.       OnMouseMove = MsgIndexTitlePanelMouseMove
  55.       object LblName: TLabel
  56.         Left = 54
  57.         Top = 1
  58.         Width = 86
  59.         Height = 15
  60.         Caption = 'Message Index'
  61.         Font.Charset = DEFAULT_CHARSET
  62.         Font.Color = clWhite
  63.         Font.Height = 15
  64.         Font.Name = 'Arial'
  65.         Font.Style = [fsBold]
  66.         ParentFont = False
  67.         OnClick = MsgIndexTitlePanelClick
  68.       end
  69.       object LblMailbox: TLabel
  70.         Left = 4
  71.         Top = 1
  72.         Width = 47
  73.         Height = 15
  74.         Caption = 'Mailbox:'
  75.         Color = clSilver
  76.         Font.Charset = DEFAULT_CHARSET
  77.         Font.Color = clYellow
  78.         Font.Height = 15
  79.         Font.Name = 'Arial'
  80.         Font.Style = [fsBold]
  81.         ParentColor = False
  82.         ParentFont = False
  83.         Transparent = True
  84.         OnClick = MsgIndexTitlePanelClick
  85.       end
  86.       object Panel1: TPanel
  87.         Left = 156
  88.         Top = 0
  89.         Width = 370
  90.         Height = 17
  91.         Align = alRight
  92.         BevelOuter = bvNone
  93.         ParentColor = True
  94.         TabOrder = 0
  95.         object LblShowOnly: TLabel
  96.           Left = 4
  97.           Top = 1
  98.           Width = 31
  99.           Height = 15
  100.           Caption = 'Show'
  101.           Color = clSilver
  102.           Font.Charset = DEFAULT_CHARSET
  103.           Font.Color = clSilver
  104.           Font.Height = 15
  105.           Font.Name = 'Arial'
  106.           Font.Style = []
  107.           ParentColor = False
  108.           ParentFont = False
  109.           Transparent = True
  110.           OnClick = MsgIndexTitlePanelClick
  111.         end
  112.         object LblContain: TLabel
  113.           Left = 132
  114.           Top = 1
  115.           Width = 57
  116.           Height = 15
  117.           Caption = 'containing'
  118.           Color = clSilver
  119.           Font.Charset = DEFAULT_CHARSET
  120.           Font.Color = clSilver
  121.           Font.Height = 15
  122.           Font.Name = 'Arial'
  123.           Font.Style = []
  124.           ParentColor = False
  125.           ParentFont = False
  126.           Transparent = True
  127.           OnClick = MsgIndexTitlePanelClick
  128.         end
  129.         object BtnShowOnly: TSpeedButton
  130.           Left = 269
  131.           Top = 0
  132.           Width = 24
  133.           Height = 17
  134.           Cursor = crHandPoint
  135.           Caption = 'Go!'
  136.           Flat = True
  137.           Font.Charset = DEFAULT_CHARSET
  138.           Font.Color = clWhite
  139.           Font.Height = 14
  140.           Font.Name = 'Arial'
  141.           Font.Style = [fsBold]
  142.           ParentFont = False
  143.           OnClick = BtnShowOnlyClick
  144.         end
  145.         object EditContain: TEdit
  146.           Left = 194
  147.           Top = 1
  148.           Width = 75
  149.           Height = 16
  150.           BorderStyle = bsNone
  151.           Enabled = False
  152.           Font.Charset = DEFAULT_CHARSET
  153.           Font.Color = clWhite
  154.           Font.Height = 15
  155.           Font.Name = 'Arial'
  156.           Font.Style = []
  157.           ParentColor = True
  158.           ParentFont = False
  159.           TabOrder = 1
  160.           OnChange = EditContainChange
  161.           OnExit = EditContainExit
  162.           OnKeyPress = EditContainKeyPress
  163.         end
  164.         object cbHide: TCheckBox
  165.           Left = 297
  166.           Top = 1
  167.           Width = 78
  168.           Height = 17
  169.           Caption = 'Hide rest'
  170.           Font.Charset = DEFAULT_CHARSET
  171.           Font.Color = clWhite
  172.           Font.Height = 15
  173.           Font.Name = 'Arial'
  174.           Font.Style = []
  175.           ParentFont = False
  176.           TabOrder = 2
  177.           OnClick = BtnShowOnlyClick
  178.         end
  179.         object cbShowOnly: TEnhComboBox
  180.           Left = 38
  181.           Top = -2
  182.           Width = 90
  183.           Height = 21
  184.           Style = csDropDownList
  185.           AutoDropDownWidth = True
  186.           Color = clBlack
  187.           Ctl3D = False
  188.           DropDownCount = 16
  189.           DropDownWidth = 145
  190.           Font.Charset = DEFAULT_CHARSET
  191.           Font.Color = clWhite
  192.           Font.Height = 13
  193.           Font.Name = 'Arial'
  194.           Font.Style = []
  195.           ItemHeight = 13
  196.           Items.Strings = (
  197.             'everything'
  198.             'subject'
  199.             'from'
  200.             'date'
  201.             'size'
  202.             'to'
  203.             'priority'
  204.             'unread'
  205.             'read'
  206.             'with attached'
  207.             'without attached')
  208.           HorizontalExtent = 0
  209.           ParentCtl3D = False
  210.           ParentFont = False
  211.           TabOrder = 0
  212.           OnChange = cbShowOnlyChange
  213.         end
  214.       end
  215.     end
  216.     object IndexList: TListView
  217.       Left = 2
  218.       Top = 22
  219.       Width = 526
  220.       Height = 236
  221.       Align = alClient
  222.       Columns = <
  223.         item
  224.           Caption = 'Subject'
  225.           Width = 140
  226.         end
  227.         item
  228.           Caption = 'From'
  229.           Width = 90
  230.         end
  231.         item
  232.           Caption = 'Date'
  233.           Width = 80
  234.         end
  235.         item
  236.           Caption = 'Size'
  237.         end
  238.         item
  239.           Caption = 'To'
  240.           Width = 100
  241.         end
  242.         item
  243.           Caption = 'Priority'
  244.           Width = 60
  245.         end>
  246.       DragMode = dmAutomatic
  247.       HideSelection = False
  248.       HotTrackStyles = []
  249.       MultiSelect = True
  250.       OwnerData = True
  251.       ReadOnly = True
  252.       RowSelect = True
  253.       PopupMenu = PopupMessage
  254.       SmallImages = MsgIndexIcons_S
  255.       SortType = stData
  256.       TabOrder = 1
  257.       ViewStyle = vsReport
  258.       OnChange = IndexListChange
  259.       OnClick = IndexListClick
  260.       OnColumnClick = IndexListColumnClick
  261.       OnCustomDraw = IndexListCustomDraw
  262.       OnCustomDrawItem = IndexListCustomDrawItem
  263.       OnCustomDrawSubItem = IndexListCustomDrawSubItem
  264.       OnData = IndexListData
  265.       OnDataFind = IndexListDataFind
  266.       OnDblClick = IndexListDblClick
  267.       OnDragDrop = IndexListDragDrop
  268.       OnDragOver = IndexListDragOver
  269.       OnKeyUp = IndexListKeyUp
  270.       OnStartDrag = IndexListStartDrag
  271.     end
  272.   end
  273.   object MsgIndexIcons_S: TImageList
  274.     Left = 107
  275.     Top = 62
  276.   end
  277.   object PopupMessage: TPopupMenu
  278.     OnPopup = PopupMessagePopup
  279.     Left = 143
  280.     Top = 62
  281.     object ShowOnly1: TMenuItem
  282.       Caption = '&Show Only'
  283.       object MenuDisplay1: TMenuItem
  284.         Caption = 'Messages with similar SUBJECT'
  285.         OnClick = MenuDisplay1Click
  286.       end
  287.       object MenuDisplay2: TMenuItem
  288.         Caption = 'Messages FROM same sender'
  289.         OnClick = MenuDisplay1Click
  290.       end
  291.       object N3: TMenuItem
  292.         Caption = '-'
  293.       end
  294.       object MenuDisplay3: TMenuItem
  295.         Caption = 'Messages sent on same DATE'
  296.         OnClick = MenuDisplay1Click
  297.       end
  298.       object MenuDisplay5: TMenuItem
  299.         Caption = 'Messages sent TO same address'
  300.         OnClick = MenuDisplay1Click
  301.       end
  302.       object MenuDisplay6: TMenuItem
  303.         Caption = 'Messages with same PRIORITY'
  304.         OnClick = MenuDisplay1Click
  305.       end
  306.       object N5: TMenuItem
  307.         Caption = '-'
  308.       end
  309.       object MenuDisplay7: TMenuItem
  310.         Caption = 'All unread messages'
  311.         OnClick = MenuDisplay1Click
  312.       end
  313.       object MenuDisplay8: TMenuItem
  314.         Caption = 'All messages with attachment'
  315.         OnClick = MenuDisplay1Click
  316.       end
  317.     end
  318.     object N4: TMenuItem
  319.       Caption = '-'
  320.     end
  321.     object TagMessage1: TMenuItem
  322.       Caption = 'Tag M&essage'
  323.       ShortCut = 16468
  324.       OnClick = TagMessage1Click
  325.     end
  326.     object UntagMessage1: TMenuItem
  327.       Caption = 'Untag Message'
  328.       ShortCut = 16469
  329.       OnClick = UntagMessage1Click
  330.     end
  331.     object ClearAllTags1: TMenuItem
  332.       Caption = 'U&ntag All Messages'
  333.       OnClick = ClearAllTags1Click
  334.     end
  335.     object N6: TMenuItem
  336.       Caption = '-'
  337.     end
  338.     object SelectTaggedMessages1: TMenuItem
  339.       Caption = 'Select &Tagged'
  340.       ShortCut = 49236
  341.       OnClick = SelectTaggedMessages1Click
  342.     end
  343.     object MarkasUnread1: TMenuItem
  344.       Caption = 'Mark as &Unread'
  345.       ShortCut = 16603
  346.       OnClick = MarkasUnread1Click
  347.     end
  348.     object MarkasRead1: TMenuItem
  349.       Caption = 'Mark as &Read'
  350.       ShortCut = 16605
  351.       OnClick = MarkasRead1Click
  352.     end
  353.     object InvertSelection1: TMenuItem
  354.       Caption = '&Invert Selection'
  355.       OnClick = InvertSelection1Click
  356.     end
  357.     object SelectAll1: TMenuItem
  358.       Caption = 'Select &All'
  359.       ShortCut = 16449
  360.       OnClick = SelectAll1Click
  361.     end
  362.     object N12: TMenuItem
  363.       Caption = '-'
  364.     end
  365.     object DeleteMessage1: TMenuItem
  366.       Caption = '&Delete Message'
  367.       ShortCut = 46
  368.       OnClick = DeleteMessage1Click
  369.     end
  370.     object JunkMail1: TMenuItem
  371.       Caption = '&Junk Mail  -  In the Future...'
  372.       object MenuJunk1: TMenuItem
  373.         Caption = 'Trash messages with similar SUBJECT'
  374.         OnClick = MenuJunk1Click
  375.       end
  376.       object MenuJunk2: TMenuItem
  377.         Caption = 'Trash messages FROM same sender'
  378.         OnClick = MenuJunk1Click
  379.       end
  380.     end
  381.     object N1: TMenuItem
  382.       Caption = '-'
  383.     end
  384.     object Message1: TMenuItem
  385.       Caption = '&Message'
  386.       object New1: TMenuItem
  387.         Caption = '&New'
  388.         ShortCut = 16462
  389.         OnClick = New1Click
  390.       end
  391.       object Reply2: TMenuItem
  392.         Caption = '&Reply'
  393.         ShortCut = 16466
  394.         OnClick = Reply2Click
  395.       end
  396.       object ReplytoAll2: TMenuItem
  397.         Caption = 'Reply to A&ll'
  398.       end
  399.       object Forward2: TMenuItem
  400.         Caption = '&Forward'
  401.         ShortCut = 16471
  402.         OnClick = Forward2Click
  403.       end
  404.       object Bounce1: TMenuItem
  405.         Caption = '&Bounce'
  406.         ShortCut = 16450
  407.         OnClick = Bounce1Click
  408.       end
  409.       object N7: TMenuItem
  410.         Caption = '-'
  411.       end
  412.       object Copy1: TMenuItem
  413.         Caption = '&Copy Message'
  414.         ShortCut = 16451
  415.         OnClick = Copy1Click
  416.       end
  417.       object N8: TMenuItem
  418.         Caption = '-'
  419.       end
  420.       object ResetMessageStatusIcon1: TMenuItem
  421.         Caption = 'Reset Status &Icon'
  422.         OnClick = ResetMessageStatusIcon1Click
  423.       end
  424.     end
  425.     object N2: TMenuItem
  426.       Caption = '-'
  427.     end
  428.     object DisplayPreferences1: TMenuItem
  429.       Caption = 'Display &Preferences'
  430.       object ColumnShadingOptions1: TMenuItem
  431.         Caption = 'Colu&mn Shading Options...'
  432.         OnClick = ColumnShadingOptions1Click
  433.       end
  434.       object Changedisplayfont1: TMenuItem
  435.         Caption = 'Change Display Fon&t...'
  436.         OnClick = Changedisplayfont1Click
  437.       end
  438.       object Changedisplaycolours1: TMenuItem
  439.         Caption = 'C&hange Display Colours...'
  440.         OnClick = Changedisplaycolours1Click
  441.       end
  442.     end
  443.   end
  444. end
  445.